%
articleid=request("id")
set rs=server.createobject("adodb.recordset")
sql="select * from learning where articleid="&articleid
rs.open sql,conn,1,1
if rs.eof or rs.bof then
response.write ""
response.end()
end if
zhuyan=rs("name")
if len(zhuyan)>16 then
zhuyan=left(zhuyan,16)&"..."
end if
title=rs("title")
ittype=rs("typeid")
where=rs("where")
content1=rs("content")
hits=rs("hits")
sipp=rs("serverip")
dateandtime=rs("dateandtime")
domurl=rs("domurl")
movietype=rs("movietype")
if movietype="rm" or movietype="md" then
movietype="17BOBO_P2P"
elseif movietype="qvod" then
movietype="Qvod_player"
end if
conn.execute("update learning set hits=hits+1 where articleid="&articleid)
rs.close
set rs=nothing
%>
<%Set rstt=conn.execute("select count(id) from movieurl where nameid='"&articleid&"'")
urls=rstt(0)
rstt.close
if urls>40 then
%>
<%else%>
<%
end if
sql="select * from movieurl where nameid='"&articleid&"' order by id asc"
set rsurl=server.createobject("adodb.recordset")
rsurl.open sql,conn,1,1
if rsurl.eof then
response.write "暂停该影片的在线播放,想看该片的朋友稍后或下载后再观看!"
else
no=rsurl.recordcount
if no=1 then%>